MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 12 - 1996 / 12.04 Apr 96 / ThreadingAppleEvents.sit / ThreadingAppleEvents / Grant's CGI Code 1.0b13 / Util / StringUtil.c < prev next >
MacBinary | 1995-12-11 | 2.4 KB | [TEXT/CWIE]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Mon Dec 11 02:44:48 1995, modified Mon Dec 11 02:44:48 1995, creator 'CWIE', type ASCII, 1752 bytes "StringUtil.c" , at 0x758 410 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[CWIE]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 53 74 72 69 6e 67 | 55 74 69 6c 2e 63 00 00 |..String|Util.c..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 00 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 06 d8 00 | 00 01 9a ac f1 91 f0 ac |........|........|
|00000060| f1 91 f0 00 00 04 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 c4 02 00 00 |........|........|
|00000080| 2f 2a 2a 2a 2a 2a 0d 20 | 2a 0d 20 2a 09 53 74 72 |/*****. |*. *.Str|
|00000090| 69 6e 67 55 74 69 6c 2e | 63 0d 20 2a 0d 20 2a 09 |ingUtil.|c. *. *.|
|000000a0| 54 68 69 73 20 69 73 20 | 61 20 73 75 70 70 6f 72 |This is |a suppor|
|000000b0| 74 20 66 69 6c 65 20 66 | 6f 72 20 22 47 72 61 6e |t file f|or "Gran|
|000000c0| 74 27 73 20 43 47 49 20 | 46 72 61 6d 65 77 6f 72 |t's CGI |Framewor|
|000000d0| 6b 22 2e 0d 20 2a 09 50 | 6c 65 61 73 65 20 73 65 |k".. *.P|lease se|
|000000e0| 65 20 74 68 65 20 6c 69 | 63 65 6e 73 65 20 61 67 |e the li|cense ag|
|000000f0| 72 65 65 6d 65 6e 74 20 | 74 68 61 74 20 61 63 63 |reement |that acc|
|00000100| 6f 6d 70 61 6e 69 65 73 | 20 74 68 65 20 64 69 73 |ompanies| the dis|
|00000110| 74 72 69 62 75 74 69 6f | 6e 20 70 61 63 6b 61 67 |tributio|n packag|
|00000120| 65 0d 20 2a 09 66 6f 72 | 20 6c 69 63 65 6e 73 69 |e. *.for| licensi|
|00000130| 6e 67 20 64 65 74 61 69 | 6c 73 2e 0d 20 2a 0d 20 |ng detai|ls.. *. |
|00000140| 2a 09 43 6f 70 79 72 69 | 67 68 74 20 a9 31 39 39 |*.Copyri|ght .199|
|00000150| 35 20 62 79 20 47 72 61 | 6e 74 20 4e 65 75 66 65 |5 by Gra|nt Neufe|
|00000160| 6c 64 0d 20 2a 09 67 72 | 61 6e 74 40 61 63 6d 2e |ld. *.gr|ant@acm.|
|00000170| 63 6f 6d 0d 20 2a 09 68 | 74 74 70 3a 2f 2f 61 72 |com. *.h|ttp://ar|
|00000180| 70 70 31 2e 63 61 72 6c | 65 74 6f 6e 2e 63 61 2f |pp1.carl|eton.ca/|
|00000190| 67 72 61 6e 74 2f 0d 20 | 2a 0d 20 2a 2a 2a 2a 2a |grant/. |*. *****|
|000001a0| 2f 0d 0d 23 69 6e 63 6c | 75 64 65 20 3c 73 74 72 |/..#incl|ude <str|
|000001b0| 69 6e 67 2e 68 3e 0d 0d | 23 69 6e 63 6c 75 64 65 |ing.h>..|#include|
|000001c0| 20 22 63 6f 6d 70 69 6c | 65 72 5f 73 74 75 66 66 | "compil|er_stuff|
|000001d0| 2e 68 22 0d 0d 23 69 6e | 63 6c 75 64 65 20 22 53 |.h"..#in|clude "S|
|000001e0| 74 72 69 6e 67 55 74 69 | 6c 2e 68 22 0d 0d 0d 2f |tringUti|l.h".../|
|000001f0| 2a 2a 2a 20 20 46 55 4e | 43 54 49 4f 4e 53 20 20 |***  FUN|CTIONS  |
|00000200| 2a 2a 2a 2f 0d 0d 2f 2a | 20 43 6f 70 79 20 70 61 |***/../*| Copy pa|
|00000210| 73 63 61 6c 20 66 6f 72 | 6d 61 74 20 73 72 63 53 |scal for|mat srcS|
|00000220| 74 72 20 74 6f 20 74 68 | 65 20 64 65 73 74 53 74 |tr to th|e destSt|
|00000230| 72 20 2a 2f 0d 76 6f 69 | 64 0d 53 74 72 69 6e 67 |r */.voi|d.String|
|00000240| 50 61 73 63 61 6c 43 6f | 70 79 20 28 20 63 68 61 |PascalCo|py ( cha|
|00000250| 72 20 2a 73 72 63 53 74 | 72 2c 20 63 68 61 72 20 |r *srcSt|r, char |
|00000260| 2a 64 65 73 74 53 74 72 | 20 29 0d 7b 0d 09 42 6c |*destStr| ).{..Bl|
|00000270| 6f 63 6b 4d 6f 76 65 20 | 28 20 73 72 63 53 74 72 |ockMove |( srcStr|
|00000280| 2c 20 64 65 73 74 53 74 | 72 2c 20 28 73 72 63 53 |, destSt|r, (srcS|
|00000290| 74 72 5b 6e 69 6c 5d 29 | 20 2b 20 31 20 29 3b 0d |tr[nil])| + 1 );.|
|000002a0| 7d 20 2f 2a 20 53 74 72 | 69 6e 67 50 61 73 63 61 |} /* Str|ingPasca|
|000002b0| 6c 43 6f 70 79 20 2a 2f | 0d 0d 0d 2f 2a 20 63 6f |lCopy */|.../* co|
|000002c0| 75 6e 74 20 74 68 65 20 | 6f 63 63 75 72 61 6e 63 |unt the |occuranc|
|000002d0| 65 73 20 6f 66 20 74 68 | 65 43 68 61 72 20 69 6e |es of th|eChar in|
|000002e0| 20 74 68 65 53 74 72 69 | 6e 67 20 2a 2f 0d 6c 6f | theStri|ng */.lo|
|000002f0| 6e 67 0d 53 74 72 69 6e | 67 43 6f 75 6e 74 43 68 |ng.Strin|gCountCh|
|00000300| 61 72 20 28 20 63 68 61 | 72 20 2a 74 68 65 53 74 |ar ( cha|r *theSt|
|00000310| 72 69 6e 67 2c 20 63 68 | 61 72 20 74 68 65 43 68 |ring, ch|ar theCh|
|00000320| 61 72 20 29 0d 7b 0d 09 | 6c 6f 6e 67 09 74 6f 74 |ar ).{..|long.tot|
|00000330| 61 6c 3b 0d 09 63 68 61 | 72 20 2a 09 74 65 6d 70 |al;..cha|r *.temp|
|00000340| 53 74 72 3b 0d 09 0d 09 | 74 6f 74 61 6c 09 3d 20 |Str;....|total.= |
|00000350| 6e 69 6c 3b 0d 09 74 65 | 6d 70 53 74 72 09 3d 20 |nil;..te|mpStr.= |
|00000360| 74 68 65 53 74 72 69 6e | 67 3b 0d 09 0d 09 64 6f |theStrin|g;....do|
|00000370| 0d 09 7b 0d 09 09 74 65 | 6d 70 53 74 72 20 3d 20 |..{...te|mpStr = |
|00000380| 53 74 72 69 6e 67 43 68 | 61 72 20 28 20 74 65 6d |StringCh|ar ( tem|
|00000390| 70 53 74 72 2c 20 74 68 | 65 43 68 61 72 20 29 3b |pStr, th|eChar );|
|000003a0| 0d 09 09 0d 09 09 69 66 | 20 28 20 28 74 65 6d 70 |......if| ( (temp|
|000003b0| 53 74 72 20 21 3d 20 6e | 69 6c 29 20 26 26 20 28 |Str != n|il) && (|
|000003c0| 2a 74 65 6d 70 53 74 72 | 20 21 3d 20 6e 69 6c 29 |*tempStr| != nil)|
|000003d0| 20 29 0d 09 09 7b 0d 09 | 09 09 74 65 6d 70 53 74 | )...{..|..tempSt|
|000003e0| 72 2b 2b 3b 0d 09 09 09 | 74 6f 74 61 6c 2b 2b 3b |r++;....|total++;|
|000003f0| 0d 09 09 7d 0d 09 7d 20 | 77 68 69 6c 65 20 28 20 |...}..} |while ( |
|00000400| 28 74 65 6d 70 53 74 72 | 20 21 3d 20 6e 69 6c 29 |(tempStr| != nil)|
|00000410| 20 26 26 20 28 2a 74 65 | 6d 70 53 74 72 20 21 3d | && (*te|mpStr !=|
|00000420| 20 6e 69 6c 29 20 29 3b | 0d 09 0d 09 72 65 74 75 | nil) );|....retu|
|00000430| 72 6e 20 74 6f 74 61 6c | 3b 0d 7d 20 2f 2a 20 53 |rn total|;.} /* S|
|00000440| 74 72 69 6e 67 43 6f 75 | 6e 74 43 68 61 72 20 2a |tringCou|ntChar *|
|00000450| 2f 0d 0d 0d 2f 2a 20 52 | 65 74 75 72 6e 73 20 74 |/.../* R|eturns t|
|00000460| 72 75 65 20 69 66 20 61 | 6e 79 20 63 68 61 72 73 |rue if a|ny chars|
|00000470| 20 77 65 72 65 20 63 6f | 6e 76 65 72 74 65 64 20 | were co|nverted |
|00000480| 2a 2f 0d 42 6f 6f 6c 65 | 61 6e 0d 53 74 72 69 6e |*/.Boole|an.Strin|
|00000490| 67 43 6f 6e 76 65 72 74 | 43 68 61 72 54 6f 43 68 |gConvert|CharToCh|
|000004a0| 61 72 20 28 20 63 68 61 | 72 20 2a 69 6f 53 74 72 |ar ( cha|r *ioStr|
|000004b0| 69 6e 67 2c 20 63 68 61 | 72 20 66 72 6f 6d 43 68 |ing, cha|r fromCh|
|000004c0| 61 72 2c 20 63 68 61 72 | 20 74 6f 43 68 61 72 20 |ar, char| toChar |
|000004d0| 29 0d 7b 0d 09 42 6f 6f | 6c 65 61 6e 09 64 69 64 |).{..Boo|lean.did|
|000004e0| 43 6f 6e 76 65 72 74 3b | 0d 09 0d 09 64 69 64 43 |Convert;|....didC|
|000004f0| 6f 6e 76 65 72 74 20 3d | 20 66 61 6c 73 65 3b 0d |onvert =| false;.|
|00000500| 09 0d 09 77 68 69 6c 65 | 20 28 20 69 6f 53 74 72 |...while| ( ioStr|
|00000510| 69 6e 67 5b 30 5d 20 21 | 3d 20 6e 69 6c 20 29 0d |ing[0] !|= nil ).|
|00000520| 09 7b 0d 09 09 69 66 20 | 28 20 69 6f 53 74 72 69 |.{...if |( ioStri|
|00000530| 6e 67 5b 30 5d 20 3d 3d | 20 66 72 6f 6d 43 68 61 |ng[0] ==| fromCha|
|00000540| 72 20 29 0d 09 09 7b 0d | 09 09 09 69 6f 53 74 72 |r )...{.|...ioStr|
|00000550| 69 6e 67 5b 30 5d 20 3d | 20 74 6f 43 68 61 72 3b |ing[0] =| toChar;|
|00000560| 0d 09 09 09 64 69 64 43 | 6f 6e 76 65 72 74 20 20 |....didC|onvert  |
|00000570| 3d 20 74 72 75 65 3b 0d | 09 09 7d 0d 09 09 69 6f |= true;.|..}...io|
|00000580| 53 74 72 69 6e 67 2b 2b | 3b 0d 09 7d 0d 09 0d 09 |String++|;..}....|
|00000590| 72 65 74 75 72 6e 20 64 | 69 64 43 6f 6e 76 65 72 |return d|idConver|
|000005a0| 74 3b 0d 7d 20 2f 2a 20 | 53 74 72 69 6e 67 43 6f |t;.} /* |StringCo|
|000005b0| 6e 76 65 72 74 43 68 61 | 72 54 6f 43 68 61 72 20 |nvertCha|rToChar |
|000005c0| 2a 2f 0d 0d 0d 2f 2a 20 | 77 6f 72 6b 69 6e 67 20 |*/.../* |working |
|000005d0| 76 65 72 73 69 6f 6e 20 | 6f 66 20 73 74 72 63 68 |version |of strch|
|000005e0| 72 20 66 6f 72 20 54 50 | 4d 20 2a 2f 0d 23 69 66 |r for TP|M */.#if|
|000005f0| 20 6b 43 6f 6d 70 69 6c | 69 6e 67 5f 46 6f 72 5f | kCompil|ing_For_|
|00000600| 53 79 6d 61 6e 74 65 63 | 0d 63 68 61 72 20 2a 0d |Symantec|.char *.|
|00000610| 53 74 72 69 6e 67 43 68 | 61 72 20 28 20 63 6f 6e |StringCh|ar ( con|
|00000620| 73 74 20 63 68 61 72 20 | 2a 74 68 65 53 74 72 69 |st char |*theStri|
|00000630| 6e 67 2c 20 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |ng, unsi|gned cha|
|00000640| 72 20 74 68 65 43 68 61 | 72 20 29 0d 7b 0d 09 64 |r theCha|r ).{..d|
|00000650| 6f 0d 09 7b 0d 09 09 69 | 66 20 28 20 2a 74 68 65 |o..{...i|f ( *the|
|00000660| 53 74 72 69 6e 67 20 3d | 3d 20 74 68 65 43 68 61 |String =|= theCha|
|00000670| 72 20 29 0d 09 09 7b 0d | 09 09 09 2f 2a 20 66 6f |r )...{.|.../* fo|
|00000680| 75 6e 64 20 74 68 65 20 | 63 68 61 72 61 63 74 65 |und the |characte|
|00000690| 72 2c 20 72 65 74 75 72 | 6e 20 61 20 70 6f 69 6e |r, retur|n a poin|
|000006a0| 74 65 72 20 74 6f 20 69 | 74 20 2a 2f 0d 09 09 09 |ter to i|t */....|
|000006b0| 72 65 74 75 72 6e 20 28 | 63 68 61 72 20 2a 29 74 |return (|char *)t|
|000006c0| 68 65 53 74 72 69 6e 67 | 3b 0d 09 09 7d 0d 09 09 |heString|;...}...|
|000006d0| 74 68 65 53 74 72 69 6e | 67 2b 2b 3b 0d 09 7d 20 |theStrin|g++;..} |
|000006e0| 77 68 69 6c 65 20 28 20 | 2a 74 68 65 53 74 72 69 |while ( |*theStri|
|000006f0| 6e 67 20 21 3d 20 6e 69 | 6c 20 29 3b 0d 09 0d 09 |ng != ni|l );....|
|00000700| 2f 2a 20 64 69 64 6e 27 | 74 20 66 69 6e 64 20 74 |/* didn'|t find t|
|00000710| 68 65 20 63 68 61 72 61 | 63 74 65 72 20 2a 2f 0d |he chara|cter */.|
|00000720| 09 72 65 74 75 72 6e 20 | 6e 69 6c 3b 0d 7d 20 2f |.return |nil;.} /|
|00000730| 2a 20 53 74 72 69 6e 67 | 43 68 61 72 20 2a 2f 0d |* String|Char */.|
|00000740| 23 65 6e 64 69 66 0d 0d | 0d 2f 2a 2a 2a 20 20 45 |#endif..|./***  E|
|00000750| 4f 46 20 20 2a 2a 2a 2f | 00 00 00 00 00 00 00 00 |OF  ***/|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00000790| 20 50 32 28 00 08 48 c1 | 90 81 32 2e ff fe 48 c1 | P2(..H.|..2...H.|
|000007a0| 90 81 54 40 3d 40 fe e8 | 4f ef 00 50 6f 0c 30 2e |..T@=@..|O..Po.0.|
|000007b0| 0c 53 74 72 69 6e 67 55 | 74 69 6c 2e 63 c9 02 00 |.StringU|til.c...|
|000007c0| 00 00 54 45 58 54 43 57 | 49 45 00 04 00 00 00 00 |..TEXTCW|IE......|
|000007d0| 00 00 54 45 58 54 43 57 | 49 45 00 04 00 00 00 00 |..TEXTCW|IE......|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 ac 09 4e 56 00 00 | 00 00 00 00 01 9a 20 6d |....NV..|...... m|
|00000800| e5 fe 20 50 3f 28 00 56 | 48 c5 30 2e ff fe 48 c0 |.. P?(.V|H.0...H.|
|00000810| d0 85 54 40 3f 00 a8 a7 | 70 01 2f 00 72 00 2f 01 |..T@?...|p./.r./.|
|00000820| 2f 01 48 6e fe ea 20 6d | e5 fe 20 50 2f 28 00 96 |/.Hn.. m|.. P/(..|
|00000830| 4e ad 1e 7a 28 40 20 0c | 4f ef 00 14 66 22 48 78 |N..z(@ .|O...f"Hx|
|00000840| 01 f2 70 37 2f 00 30 38 | 02 20 38 00 48 c0 2f 00 |..p7/.08|. 8.H./.|
|00000850| 48 78 19 11 4e ad 07 ea | 4f ef 00 10 60 00 06 9c |Hx..N...|O...`...|
|00000860| 20 6d e5 fe 20 50 21 4c | 00 92 20 6d e5 fe 20 50 | m.. P!L|.. m.. P|
|00000870| 30 28 00 56 48 c0 20 6d | e5 fe 20 50 32 28 00 52 |0(.VH. m|.. P2(.R|
|00000880| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 03 | 00 04 00 57 00 05 01 b4 |........|...W....|
|000008b0| 02 19 00 57 00 05 01 b4 | 02 19 ac f1 4b c3 00 00 |...W....|....K...|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 00 04 |........|........|
|000008d0| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|000008e0| 00 00 00 46 01 17 40 20 | 2e 46 00 00 00 1c 00 46 |...F..@ |.F.....F|
|000008f0| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00000900| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00000910| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00000920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+